• Lunes 23 de Diciembre de 2024, 04:03

Autor Tema:  Re: Nesesito ayuda plizzzzzzz  (Leído 1051 veces)

Morgoth

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Re: Nesesito ayuda plizzzzzzz
« en: Lunes 5 de Mayo de 2003, 20:14 »
0
Alguien me podria indicar como puedo arrancar el access por codigo en un programa de visual basic? yo he probado shell("msaccess C:basededatos.mdb")
pero me dice que no encuentra la ruta, y si es la ruta adecuada.
Alguien podria ayudarme?
Gracias:devil:

observador

  • Miembro activo
  • **
  • Mensajes: 65
    • Ver Perfil
    • http://www.soloprogramacion.net/
Re: Nesesito ayuda plizzzzzzz
« Respuesta #1 en: Lunes 5 de Mayo de 2003, 20:34 »
0
Se puede, es utilizando una API, ShellExecute, con esta funcion puedes ejecutar cualquier cosa que este en la maquina o en la red local o incluso abrir una pagina de Internet...

Inserta un control CommandButton en el formularios, copea el siguiente codigo en (General) (Declaraciones) de un formulario y sustituye el valor de la variable Archivo por el nombre del archivo, incluye la ruta del archivo si es necesario... y ejecutalo...

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Dim Archivo As String

Private Sub Command1_Click()
'Si el archivo esta el el directorio de trabajo
'solo es necesario indicarle el nombre del archivo
'Ejemplo: "basededatos.mdb"

'Si el archivo no esta el el directorio de trabajo
'entonces argumento Archivo deve incluir la ruta completa
'Ejemplo: "C:basededatos.mdb"

Archivo = "C:basededatos.mdb"
ShellExecute 0, "Open", Archivo, "", "", vbNormalFocus
End Sub

Con este codigo le indicas al SO que te abra el archivo con el programa configurado para ello (que en este caso supongo que debe ser Access)... y listo... :comp:
Solo Programacion Net

Hasta pronto...

JuanK

  • Miembro de ORO
  • ******
  • Mensajes: 5393
  • Nacionalidad: co
    • Ver Perfil
    • http://juank.io
Re: Nesesito ayuda plizzzzzzz
« Respuesta #2 en: Lunes 5 de Mayo de 2003, 21:06 »
0
Lo que pasa es que le pasate la ruta mal
prueba asi:

shell("msaccess basededatos.mdb")

no te confundas con la ruta de las carpetas, siempre que utilizas el  al pincipio te refireres a que la ruta es a partir del dierctorio raiz,. que generalmente es c:

Juank
[size=109]Juan Carlos Ruiz Pacheco
[/size]
Microsoft Technical Evangelist
@JuanKRuiz
http://juank.io

Majuhemo

  • Miembro activo
  • **
  • Mensajes: 85
    • Ver Perfil
Nesesito ayuda plizzzzzzz
« Respuesta #3 en: Lunes 5 de Mayo de 2003, 21:24 »
0
Hola:
dias atras el amigo FER_LUCAS publico su inconveniente, igual al tuyo, chequealo:

http://foros.solocodigo.com/viewthread.php?tid=3249

saludos;
Ruben Delgado A.
rudela@msn.com
Lima-Peru